#include <xp/bas/string.h>
#include <xp/bas/stdio.h>
#include <locale.h>

int xp_main (int argc, xp_char_t* argv[])
{
	xp_size_t n;

	if (argc != 2) {
		xp_printf (XP_TEXT("usage: %s string\n"), argv[0]);
		return -1;
	}

	xp_printf (XP_TEXT("xp_strpac (%s) => "), argv[1]);
	n = xp_strpac (argv[1]);
	xp_printf (XP_TEXT("%lu, [%s]\n"), (unsigned long)n, argv[1]);
	return 0;
}

